See dagitty::adjustmentSets()
for details.
dag_adjustment_sets(.tdy_dag, exposure = NULL, outcome = NULL, ...)ggdag_adjustment_set(
.tdy_dag,
exposure = NULL,
outcome = NULL,
...,
shadow = FALSE,
node_size = 16,
text_size = 3.88,
label_size = text_size,
text_col = "white",
label_col = text_col,
node = TRUE,
stylized = FALSE,
text = TRUE,
use_labels = NULL,
expand_x = expansion(c(0.25, 0.25)),
expand_y = expansion(c(0.2, 0.2))
)
a tidy_dagitty
with an adjusted
column and set
column, indicating adjustment status and DAG ID, respectively, for the
adjustment sets or a ggplot
input graph, an object of class tidy_dagitty
or
dagitty
a character vector, the exposure variable. Default is
NULL
, in which case it will be determined from the DAG.
a character vector, the outcome variable. Default is
NULL
, in which case it will be determined from the DAG.
additional arguments to adjustmentSets
logical. Show paths blocked by adjustment?
size of DAG node
size of DAG text
size of label text
color of DAG text
color of label text
logical. Should nodes be included in the DAG?
logical. Should DAG nodes be stylized? If so, use
geom_dag_nodes
and if not use geom_dag_point
logical. Should text be included in the DAG?
a string. Variable to use for geom_dag_repel_label()
.
Default is NULL
.
Vector of range expansion constants used to add some
padding around the data, to ensure that they are placed some distance away
from the axes. Use the convenience function ggplot2::expansion()
to
generate the values for the expand argument.
dag <- dagify(y ~ x + z2 + w2 + w1,
x ~ z1 + w1,
z1 ~ w1 + v,
z2 ~ w2 + v,
w1 ~ ~w2,
exposure = "x",
outcome = "y"
)
tidy_dagitty(dag) %>% dag_adjustment_sets()
ggdag_adjustment_set(dag)
ggdag_adjustment_set(dagitty::randomDAG(10, .5),
exposure = "x3",
outcome = "x5"
)
Run the code above in your browser using DataLab